home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / comm / tlx_sq21.zip / FONE.BAR < prev    next >
Text File  |  1992-03-15  |  1KB  |  59 lines

  1.  
  2. set test=AAAAAAAAAAAAAAAAAAAA
  3. if .%test%==.AAAAAAAAAAAAAAAAAAAA goto OK
  4.  
  5. set tdir=
  6. set tdisk=
  7. set test=4DOS
  8. if .%_CWD%==. set test=COMMAND
  9. cls
  10. echo Your system is out of environment space! You have two choices:
  11. echo 1. Remove one to three of your environment variables
  12. echo 2. Make environment larger for %test%.COM in your CONFIG.SYS file.
  13. echo :
  14. echo Example:
  15. if .%_CWD%==. echo shell=c:\COMMAND.COM /e:512 /p
  16. if not .%_CWD%==. echo shell=c:\4DOS.COM /e:1024 /s:dD: /p
  17. echo :
  18. echo and try again. Good luck!
  19. echo :
  20. goto end
  21.  
  22. :OK
  23. set test=
  24. set bbsname=%1%2%3%4%5%6%7%8%9
  25. set telix=%tdisk%:%tdir%
  26.  
  27. :; Test for 4dos/COMMAND.COM, and use the correct commands to
  28. :; switch to disc containing tdir.
  29. if .%_CWD%==. goto old1
  30.   pushd %telix%
  31.   goto new1
  32. :old1
  33.   PUSHDIR
  34.   %tdisk%:
  35.   cd %tdir%
  36. :new1
  37.  
  38. :; Enter the QuickDial script.
  39. :: The 'o' parameter skips modem initialize.
  40. telix o sqdial
  41. cls
  42. Echo Thanks for using Telix_Square!
  43.  
  44. :; Test for 4dos/COMMAND.COM, and use the correct commands to
  45. :; go back to original drive and directory.
  46. if .%_CWD%==. goto old2
  47.   popd
  48.   goto end
  49. :old2
  50.   POPDIR
  51.  
  52. :end
  53. :; Remove the environment variables used.
  54. set tdisk=
  55. set tdir=
  56. set telix=
  57. set bbsname=
  58. set sqrtime=
  59.